home *** CD-ROM | disk | FTP | other *** search
/ Shareware Super Platinum 8 / Shareware Super Platinum 8.iso / mac / DATABASE / SCH110B.ZIP;1 / DMMEMO.PRG < prev    next >
Encoding:
Text File  |  1993-02-24  |  499 b   |  22 lines
  1. *****
  2. * A sample programmable text editor.
  3. *****
  4.  
  5. *****
  6. * "dmmemof" is the UDF() function that CUSTOM uses to control the 
  7. * editor...
  8. *****
  9. superbox(00,00,24,79,.t.,"≤",.f.)
  10. superbox(04,09,21,71,.t.,"",.t.)
  11. say(02,25,"    The Sample Text Editor    ")
  12. setcursor(.t.)
  13. mv_udfname="dmmemof"
  14. mvtext=memoedit(memoread("dmtext.txt"),5,10,20,70,.t.,"CUSTOM") 
  15.  
  16. *****
  17. * if desired, you can write the text back to disk with:
  18. * memowrit("dmtext.txt",mvtext)
  19. *****
  20. setcursor(.f.)
  21. return
  22.